﻿Imports Microsoft.VisualBasic
Imports System.Data
Imports System.ComponentModel

<DataObject(True)> _
Public Class VirtualTable
    <DataObjectMethod(DataObjectMethodType.Select, True)> _
    Public Shared Function GetRecExtList() As DataTable

        Dim table As New DataTable()

        table.Columns.Add("Column name", GetType(String))
        table.Columns.Add("Filled", GetType(Boolean))

        table.Rows.Add("IsAdult", False)
        table.Rows.Add("Gender", False)
        table.Rows.Add("NI_Number", False)
        table.Rows.Add("SS_Number", False)
        table.Rows.Add("BirthMonth", False)
        table.Rows.Add("BirthDay", False)
        table.Rows.Add("BirthYear", False)
        table.Rows.Add("PostCode", False)
        table.Rows.Add("HouseNo", False)
        table.Rows.Add("OccupationNote", False)
        table.Rows.Add("IsLocal", False)
        Return table
    End Function


End Class
